#pragma GCC optimize(2)
#include <iostream>
#include <algorithm>
#include <cstring>
#include <string>
#include <map>
#include <vector>

using namespace std;
using LL = long long;
const int N = 1e6 + 10;

int n, d;
int q[N];
int num[N], hh;
bool st[N];

/*
1、首先根据观察可知，相互进行&运算的元素组成一个环， 通过dfs可以求出包含当前元素的环
2、将环拆分成链  如果拆分成[0, 1, 1, 1] 则每一次变换就相当于环移动了一次，不同的环互不影响
    1、转动一次 [0, 1, 1, 1] --> [1, 0, 1, 1] = [0, 0, 1, 1]
    2、转动两次 [0, 0, 1, 1] --> [1, 0, 0, 1] = [0, 0, 0, 1]
    3、转动三次 [0, 0, 0, 1] --> [1, 0, 0, 0] = [0, 0, 0, 0]

    环的转动可以看成0元素运动的轨迹，0元素每次移动一次都给当前位置染成0，求多少次把环变成全0就是求最少多少次0元素把整条链变成0
3、对所有的环的移动次数求一个max
*/

void dfs(int i){
    st[i] = true;
    num[hh++] = q[i];
    if(!st[(i + d) % n]) dfs((i + d) % n);
}

void solve(){
    cin >> n >> d;

    for(int i = 0; i < n; i ++){
        cin >> q[i];
        st[i] = false;
    }
    
    int maxlen = -1;

    for(int i = 0; i < n; i ++){
        if(!st[i]){
            hh = 0;
            dfs(i);

            int fo = 0;

            while(num[fo] != 0 && fo < hh) fo ++;
            if(fo == hh){
                cout << "-1" << '\n';
                return;
            }


            int cnt = 0;
            while(true){
                int cur = 0;
                while(num[(fo + 1) % hh] == 1){
                    fo = (fo + 1) % hh;
                    cur ++;
                    cnt ++;
                }

                while(num[(fo + 1) % hh] == 0 && cnt <= hh){
                    fo = (fo + 1) % hh;
                    cnt ++;
                }

                maxlen = max(maxlen, cur);

                if(cnt >= hh) break;
            }

        }
    }

 
    cout << maxlen << '\n';

}

int main(){
    freopen("in.txt", "r", stdin);
    freopen("out.txt", "w", stdout);
    ios::sync_with_stdio(false);
    cin.tie(nullptr);

    int T;
    cin >> T;
    while(T--){
        solve();
    }

    return 0;
}

  